home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue37 / DynArr / Array6U.dfm / Array6U.txt
Encoding:
Text File  |  1998-07-03  |  1.7 KB  |  88 lines
  1. object Array6MainForm: TArray6MainForm
  2.   Left = 192
  3.   Top = 109
  4.   Width = 310
  5.   Height = 273
  6.   Caption = 'Dynamic Array Example 6'
  7.   Font.Color = clWindowText
  8.   Font.Height = -11
  9.   Font.Name = 'MS Sans Serif'
  10.   Font.Style = []
  11.   PixelsPerInch = 96
  12.   Position = poDefaultPosOnly
  13.   OnCreate = FormCreate
  14.   OnDestroy = FormDestroy
  15.   TextHeight = 13
  16.   object lstArrayContents: TListBox
  17.     Left = 0
  18.     Top = 0
  19.     Width = 158
  20.     Height = 246
  21.     Align = alClient
  22.     BorderStyle = bsNone
  23.     ItemHeight = 13
  24.     TabOrder = 0
  25.   end
  26.   object Panel1: TPanel
  27.     Left = 158
  28.     Top = 0
  29.     Width = 144
  30.     Height = 246
  31.     Align = alRight
  32.     BevelOuter = bvNone
  33.     TabOrder = 1
  34.     object Label1: TLabel
  35.       Left = 16
  36.       Top = 16
  37.       Width = 70
  38.       Height = 13
  39.       Caption = 'Element &name:'
  40.       FocusControl = edtElement
  41.     end
  42.     object Label2: TLabel
  43.       Left = 16
  44.       Top = 64
  45.       Width = 70
  46.       Height = 13
  47.       Caption = 'Element &value:'
  48.       FocusControl = edtValue
  49.     end
  50.     object edtElement: TEdit
  51.       Left = 16
  52.       Top = 32
  53.       Width = 121
  54.       Height = 21
  55.       TabOrder = 0
  56.       Text = 'Name'
  57.     end
  58.     object btnGetValue: TButton
  59.       Left = 40
  60.       Top = 136
  61.       Width = 75
  62.       Height = 25
  63.       Caption = '&Get Value'
  64.       TabOrder = 2
  65.       OnClick = btnGetValueClick
  66.     end
  67.     object btnSetValue: TButton
  68.       Left = 40
  69.       Top = 184
  70.       Width = 75
  71.       Height = 25
  72.       Caption = '&Set Value'
  73.       TabOrder = 3
  74.       OnClick = btnSetValueClick
  75.     end
  76.     object edtValue: TSpinEdit
  77.       Left = 16
  78.       Top = 80
  79.       Width = 121
  80.       Height = 22
  81.       MaxValue = 2147483647
  82.       MinValue = 0
  83.       TabOrder = 1
  84.       Value = 0
  85.     end
  86.   end
  87. end
  88.